home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 25
/
AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso
/
Updates
/
HD-Installer
/
jst_dev
/
sources
/
OSEmu
/
freeanim.s
< prev
next >
Wrap
Text File
|
2000-04-12
|
699b
|
22 lines
* $Id: freeanim.s 1.1 1999/02/03 04:09:05 jotd Exp $
**************************************************************************
* FREEANIM-LIBRARY *
**************************************************************************
**************************************************************************
* INITIALIZATION *
**************************************************************************
FRANINIT move.l _franbase,d0
beq .init
rts
.init move.l #10,d0 ; at random
move.l #2,d1 ; at random
lea _franname,a0
bsr _InitLibrary
move.l d0,a0
move.l d0,_franbase
rts